home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / helper1a / dataenv.dsr < prev    next >
Text File  |  1999-10-09  |  4KB  |  118 lines
  1. VERSION 5.00
  2. Begin {C0E45035-5775-11D0-B388-00A0C9055D8E} dataenv 
  3.    ClientHeight    =   7500
  4.    ClientLeft      =   0
  5.    ClientTop       =   0
  6.    ClientWidth     =   6750
  7.    _ExtentX        =   11906
  8.    _ExtentY        =   13229
  9.    FolderFlags     =   1
  10.    TypeLibGuid     =   "{9C27FA85-7E5D-11D3-8CDE-CBF5E83E715F}"
  11.    TypeInfoGuid    =   "{9C27FA86-7E5D-11D3-8CDE-CBF5E83E715F}"
  12.    TypeInfoCookie  =   0
  13.    Version         =   4
  14.    NumConnections  =   1
  15.    BeginProperty Connection1 
  16.       ConnectionName  =   "db1"
  17.       ConnDispId      =   1001
  18.       SourceOfData    =   3
  19.       ConnectionSource=   $"dataenv.dsx":0000
  20.       Expanded        =   -1  'True
  21.       QuoteChar       =   96
  22.       SeparatorChar   =   46
  23.    EndProperty
  24.    NumRecordsets   =   2
  25.    BeginProperty Recordset1 
  26.       CommandName     =   "customers"
  27.       CommDispId      =   1002
  28.       RsDispId        =   1007
  29.       CommandText     =   "customers"
  30.       ActiveConnectionName=   "db1"
  31.       CommandType     =   2
  32.       dbObjectType    =   1
  33.       Expanded        =   -1  'True
  34.       IsRSReturning   =   -1  'True
  35.       NumFields       =   4
  36.       BeginProperty Field1 
  37.          Precision       =   0
  38.          Size            =   6
  39.          Scale           =   0
  40.          Type            =   200
  41.          Name            =   "custcode"
  42.          Caption         =   "custcode"
  43.       EndProperty
  44.       BeginProperty Field2 
  45.          Precision       =   0
  46.          Size            =   20
  47.          Scale           =   0
  48.          Type            =   200
  49.          Name            =   "custname"
  50.          Caption         =   "custname"
  51.       EndProperty
  52.       BeginProperty Field3 
  53.          Precision       =   0
  54.          Size            =   1
  55.          Scale           =   0
  56.          Type            =   200
  57.          Name            =   "sex"
  58.          Caption         =   "sex"
  59.       EndProperty
  60.       BeginProperty Field4 
  61.          Precision       =   0
  62.          Size            =   10
  63.          Scale           =   0
  64.          Type            =   200
  65.          Name            =   "phone"
  66.          Caption         =   "phone"
  67.       EndProperty
  68.       NumGroups       =   0
  69.       ParamCount      =   0
  70.       RelationCount   =   0
  71.       AggregateCount  =   0
  72.    EndProperty
  73.    BeginProperty Recordset2 
  74.       CommandName     =   "items"
  75.       CommDispId      =   1008
  76.       RsDispId        =   1013
  77.       CommandText     =   "items"
  78.       ActiveConnectionName=   "db1"
  79.       CommandType     =   2
  80.       dbObjectType    =   1
  81.       IsRSReturning   =   -1  'True
  82.       NumFields       =   3
  83.       BeginProperty Field1 
  84.          Precision       =   0
  85.          Size            =   6
  86.          Scale           =   0
  87.          Type            =   200
  88.          Name            =   "itemcode"
  89.          Caption         =   "itemcode"
  90.       EndProperty
  91.       BeginProperty Field2 
  92.          Precision       =   0
  93.          Size            =   25
  94.          Scale           =   0
  95.          Type            =   200
  96.          Name            =   "itemname"
  97.          Caption         =   "itemname"
  98.       EndProperty
  99.       BeginProperty Field3 
  100.          Precision       =   10
  101.          Size            =   4
  102.          Scale           =   0
  103.          Type            =   3
  104.          Name            =   "instock"
  105.          Caption         =   "instock"
  106.       EndProperty
  107.       NumGroups       =   0
  108.       ParamCount      =   0
  109.       RelationCount   =   0
  110.       AggregateCount  =   0
  111.    EndProperty
  112. End
  113. Attribute VB_Name = "dataenv"
  114. Attribute VB_GlobalNameSpace = False
  115. Attribute VB_Creatable = True
  116. Attribute VB_PredeclaredId = True
  117. Attribute VB_Exposed = False
  118.